home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / PGM_TOOL / PREVIEW / DLMAIN.DFM / DLMAIN.txt
Text File  |  1995-11-12  |  2KB  |  93 lines
  1. object mainwin: Tmainwin
  2.   Left = 90
  3.   Top = 137
  4.   Width = 435
  5.   Height = 300
  6.   Caption = 'Print With Screen Preview'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   FormStyle = fsMDIForm
  12.   Menu = MainMenu1
  13.   PixelsPerInch = 96
  14.   WindowMenu = ActiveWindows1
  15.   OnClose = FormClose
  16.   OnCreate = FormCreate
  17.   TextHeight = 16
  18.   object MainMenu1: TMainMenu
  19.     Left = 360
  20.     Top = 20
  21.     object File1: TMenuItem
  22.       Caption = '&File'
  23.       object ReportPreviewActive1: TMenuItem
  24.         Caption = 'Report Preview Active'
  25.         OnClick = ReportPreviewActive1Click
  26.       end
  27.       object SelectPrinter1: TMenuItem
  28.         Caption = '&Select Printer'
  29.         OnClick = SelectPrinter1Click
  30.       end
  31.       object N2: TMenuItem
  32.         Caption = '-'
  33.       end
  34.       object Exit1: TMenuItem
  35.         Caption = 'E&xit'
  36.         OnClick = Exit1Click
  37.       end
  38.     end
  39.     object ActiveWindows1: TMenuItem
  40.       Caption = '&Active Windows'
  41.       object Normal1: TMenuItem
  42.         Caption = '&Normal'
  43.         OnClick = Normal1Click
  44.       end
  45.       object Cascade1: TMenuItem
  46.         Caption = '&Cascade'
  47.         OnClick = Cascade1Click
  48.       end
  49.       object Tile1: TMenuItem
  50.         Caption = '&Tile'
  51.         OnClick = Tile1Click
  52.       end
  53.     end
  54.     object Samples1: TMenuItem
  55.       Caption = '&Print/Preview Samples'
  56.       object PlainText1: TMenuItem
  57.         Caption = 'Preview Routing Card'
  58.         OnClick = PlainText1Click
  59.       end
  60.       object PreviewJobCost1: TMenuItem
  61.         Caption = 'Preview Job Cost'
  62.         OnClick = PreviewJobCost1Click
  63.       end
  64.       object PreviewJobDueShip1: TMenuItem
  65.         Caption = 'Preview Job Due/Ship'
  66.         OnClick = PreviewJobDueShip1Click
  67.       end
  68.       object N4: TMenuItem
  69.         Caption = '-'
  70.       end
  71.       object ViewPictureofPart1: TMenuItem
  72.         Caption = 'View Picture of Part'
  73.         OnClick = ViewPictureofPart1Click
  74.       end
  75.       object ViewBluePrint1: TMenuItem
  76.         Caption = 'View Blue Print'
  77.         OnClick = ViewBluePrint1Click
  78.       end
  79.       object PrintBluePrint1: TMenuItem
  80.         Caption = 'Print Blue Print'
  81.         OnClick = PrintBluePrint1Click
  82.       end
  83.       object N5: TMenuItem
  84.         Caption = '-'
  85.       end
  86.       object CodePrintSample1: TMenuItem
  87.         Caption = 'Code Print Sample'
  88.         OnClick = CodePrintSample1Click
  89.       end
  90.     end
  91.   end
  92. end
  93.